home *** CD-ROM | disk | FTP | other *** search
/ Sacred & Secular / Sacred and Secular.iso / pc / movies / shared.dir / 04839_Script__Cap2 frameCap2 frame.ls < prev    next >
Text File  |  1996-04-03  |  2KB  |  71 lines

  1. global currentcast, popuptoggle 
  2. on exitframe
  3.   
  4.   set theV = the mouseV
  5.   if popuptoggle then highlightbutton (thev)
  6.   else
  7.     --    set the visible of sprite 16 to false
  8.     --    set the visible of sprite 17 to false
  9.     checkghostrollover
  10.     planerollover1
  11.     set the visible of sprite 17 to rollOver(19)
  12.   end if
  13.   
  14.   go the frame
  15. end
  16.  
  17. on mouseDown
  18.   global holdComingFrom, comingFrom, popuptoggle
  19.   
  20.   if popuptoggle then exit
  21.   
  22.   if the doubleclick then dontpassevent
  23.   
  24.   set h = the mouseH
  25.   
  26.   --
  27.   --
  28.   -- Check for help... (Done here as the info is distributed in 100
  29.   -- files, at this point...)
  30.   --
  31.   if the visible of sprite 41 then
  32.     set the visible of sprite 41 = 0
  33.     doHelp
  34.     exit  
  35.   end if
  36.   
  37.   if the timer > 120 then 
  38.     if h > 582 and the mouseV < 256 then
  39.       global globeicon,icon,visicon,timeicon, comingFrom
  40.       
  41.       --    if icon = globeicon then turnoffmenu(comingFrom,1,0)
  42.       if icon = globeicon then turnoffmenu("global",1,0)
  43.       else if icon = visicon then 
  44.         if comingFrom = 90 then 
  45.           set loc = holdComingFrom
  46.         else
  47.           set loc = comingFrom
  48.         end if
  49.         
  50.         turnoffmenu(loc,1,0)
  51.       else turnoffmenu("timeline",1,0)  
  52.       exit
  53.     end if
  54.     
  55.     if the mouseV < 440 and the mouseV > 0 then
  56.       if h < the left of sprite 3 then
  57.         swapPic(0,1)
  58.       else if h > the right of sprite 3 then
  59.         swapPic(1,1)
  60.       end if  
  61.     end if
  62.     
  63.   end if
  64. end
  65.  
  66. on keyDown
  67.   if the keyCode = 123 then swapPic(0,1)
  68.   else if the keyCode = 124 then swapPic(1,1)
  69.   else pass
  70. end
  71.